Her er et eksempel:
procedure VisEtTal(Tallet: Integer);
var
i: ^Integer; { Pointer til en Integer }
begin
i := @Tallet; { Sætter i til addressen på Tallet }
ShowMessage(IntToStr(I^)); { Udskriver tallet som i peger på. i^ betyder at du tager værdien af det som pointeren peger på }
end;
MH.
The-Freak
Livet er for kort til at kede sig.
Hvad er så forskellen på din kode og så det her
procedure VisEtTal(Tallet: Integer);
var
i: Integer;
begin
i := Tallet;
ShowMessage(IntToStr(I));
end;
-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GED d- s: a--- C++ W++ w PS X+ tv+ b D G e- h! !r z--
------END GEEK CODE BLOCK------